home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-13 / hplj3j11.zip / LJ3JC.SPL < prev    next >
Text File  |  1990-12-08  |  14KB  |  317 lines

  1. ;; Hewlett-Packard LaserJet III Printer Driver  12-8-90
  2. ;; Based on Borland's LJIII.ZIP dated 10-24-90, LJIII.SPL dated 11-20-90
  3. ;; Mods by James R. Celoni, S.J. (>internet: celoni@cunixf.cc.columbia.edu)
  4. ;; Mods 12-8-90:
  5. ;; Add ECMA, PC-850 tcts from new Borland driver; renamed Latin1 to ECMA;
  6. ;;     used tct PC-850 for Danish/Norwegian fonts (not PC8DN)
  7. ;; Mods 10-27-90:
  8. ;; Fix landscape bug (nine missing fields made old driver unusable)
  9. ;; Fix fonts bugs (CG Times & Univers symbol sets not set for most fonts)
  10. ;; Fix bold italic bugs ("bold.italic" was given as "italic/bold"; Sprint
  11. ;;    didn't recognize and so shadow-bolded the italic font)
  12. ;; Fix tct bugs (specified wrong for most fonts)
  13. ;; Rename fonts CGTimes->Times, Univers->Helvetica for compatibility with
  14. ;;    other drivers and usage.  The names Times Roman and Helvetica are
  15. ;;    registered trademarks of Linotype AG and its subsidiaries; use of the
  16. ;;    names here does not mean that the fonts themselves are the same.
  17. ;; Leave out size in font names if 12 and symbol set if Roman8
  18. ;; Comment out some symbol sets (see comments)
  19. ;;    Note:  Many symbol sets are missing from this and the original driver;
  20. ;;    to get ligatures, math, etc., add them using any font line as model.
  21. ;;    See user manual Appendix A tables to construct missing TCTs.
  22. ;; Add PC-8 and Legal symbol sets for scalable typefaces
  23. ;; Remove one "root" line so that extra choice not needed in SP-SETUP
  24. ;; Shorten some escape sequences
  25. ;; Improve tct Roman8 (see comments at end for orig values and changes)
  26. ;; Added LJ3JC.TCT file;
  27. ;;    put @include(LJ3JC.TCT) in documents for nice quotation marks, etc.
  28.  
  29. printer LaserJet III, root
  30.  
  31. printer LaserJet III.None-Portrait, page ^M,
  32. ;;The HP LaserJet III contains only 4 distinct fonts (Courier, Lineprinter,
  33. ;;CGTimes, and Univers) but many symbol sets.  You have the option to select
  34. ;;whichever set you wish as your default font.  If you need more information 
  35. ;;concerning symbol sets, review the LaserJet III Printer User's Manual 
  36. ;;Appendix A.
  37.     hpi 300,vpi 300,scale 1,ff^L,cr^M,leftm 2,
  38.     init ^[&l8c0e66F^[&aR^[9^[&l0O,flag2,
  39.     fwd %1g^[*p%uX,mhm 255,shadow 2,
  40.     size 50,
  41.     down ^[*p+%uY,mvm 255,reset^[E
  42.  
  43. ;;Roman8 Symbol set (tct Roman8 is later in file)
  44. font Courier,width 30,on^[(8U^[(s0p10h12v0s0b3T,tct Roman8
  45. font Courier.bold,width 30,on^[(8U^[(s0p10h12v0s3b3T,tct Roman8
  46. font Courier.italic,width 30,on^[(8U^[(s0p10h12v1s0b3T,tct Roman8
  47. font Courier10,width 25,on^[(8U^[(s0p12h10v0s0b3T,tct Roman8
  48. font Courier10.bold,width 25,on^[(8U^[(s0p12h10v0s3b3T,tct Roman8
  49. font Courier10.italic,width 25,on^[(8U^[(s0p12h10v1s0b3T,tct Roman8
  50. font LinePrinter,width 18, on^[(8U^[(s0p16.67h8.5v0s0b0T,tct Roman8
  51. font Times, on^[(8U^[(s1p%72*300/uv0s0b4101T,pst CGTimes,tct Roman8
  52. font Times.bold, on^[(8U^[(s1p%72*300/uv0s3b4101T,pst CGTimes,tct Roman8
  53. font Times.italic, on^[(8U^[(s1p%72*300/uv1s0b4101T,pst CGTimes,tct Roman8
  54. font Times.bold.italic, on^[(8U^[(s1p%72*300/uv1s3b4101T,pst CGTimes,tct Roman8
  55. font Helvetica, on^[(8U^[(s1p%72*300/uv0s0b4148T,pst Univers,tct Roman8
  56. font Helvetica.bold, on^[(8U^[(s1p%72*300/uv0s3b4148T,pst Univers,tct Roman8
  57. font Helvetica.italic, on^[(8U^[(s1p%72*300/uv1s0b4148T,pst Univers,tct Roman8
  58. font Helvetica.bold.italic, on^[(8U^[(s1p%72*300/uv1s3b4148T,pst Univers,tct Roman8
  59.  
  60. ;;ECMA-94 Latin 1 Symbol Set
  61. ;;font CourierLtn1,width 30,on^[(0N^[(s0p10h12v0s0b3T,tct ECMA
  62. ;;font CourierLtn1.bold,width 30,on^[(0N^[(s0p10h12v0s3b3T,tct ECMA
  63. ;;font CourierLtn1.italic,width 30,on^[(0N^[(s0p10h12v1s0b3T,tct ECMA
  64. ;;font Courier10Ltn1,width 25,on^[(0N^[(s0p12h10v0s0b3T,tct ECMA
  65. ;;font Courier10Ltn1.bold,width 25,on^[(0N^[(s0p12h10v0s3b3T,tct ECMA
  66. ;;font Courier10Ltn1.italic,width 25,on^[(0N^[(s0p12h10v1s0b3T,tct ECMA
  67. ;;font LinePrinterLtn1,width 18, on^[(0N^[(s0p16.67h8.5v0s0b0T,tct ECMA
  68.  
  69. ;;PC-8 Symbol Set (no tct needed)
  70. font CourierPC,width 30,on^[(10U^[(s0p10h12v0s0b3T
  71. font CourierPC.bold,width 30,on^[(10U^[(s0p10h12v0s3b3T
  72. font CourierPC.italic,width 30,on^[(10U^[(s0p10h12v1s0b3T
  73. font Courier10PC,width 25,on^[(10U^[(s0p12h10v0s0b3T
  74. font Courier10PC.bold,width 25,on^[(10U^[(s0p12h10v0s3b3T
  75. font Courier10PC.italic,width 25,on^[(10U^[(s0p12h10v1s0b3T
  76. font LinePrinterPC,width 18, on^[(10U^[(s0p16.67h8.5v0s0b0T
  77. font TimesPC, on^[(10U^[(s1p%72*300/uv0s0b4101T,pst CGTimes
  78. font TimesPC.bold, on^[(10U^[(s1p%72*300/uv0s3b4101T,pst CGTimes
  79. font TimesPC.italic, on^[(10U^[(s1p%72*300/uv1s0b4101T,pst CGTimes
  80. font TimesPC.bold.italic, on^[(10U^[(s1p%72*300/uv1s3b4101T,pst CGTimes
  81. font HelveticaPC, on^[(10U^[(s1p%72*300/uv0s0b4148T,pst Univers
  82. font HelveticaPC.bold, on^[(10U^[(s1p%72*300/uv0s3b4148T,pst Univers
  83. font HelveticaPC.italic, on^[(10U^[(s1p%72*300/uv1s0b4148T,pst Univers
  84. font HelveticaPC.bold.italic, on^[(10U^[(s1p%72*300/uv1s3b4148T,pst Univers
  85.  
  86. ;;PC-8 D/N (Danish/Norwegian) Symbol Set
  87. ;;font Courier12PC8DN,width 30,on^[(11U^[(s0p10h12v0s0b3T,tct PC-850
  88. ;;font Courier12PC8DN.bold,width 30,on^[(11U^[(s0p10h12v0s3b3T,tct PC-850
  89. ;;font Courier12PC8DN.italic,width 30,on^[(11U^[(s0p10h12v1s0b3T,tct PC-850
  90. ;;font Courier10PC8DN,width 25,on^[(11U^[(s0p12h10v0s0b3T,tct PC-850
  91. ;;font Courier10PC8DN.bold,width 25,on^[(11U^[(s0p12h10v0s3b3T,tct PC-850
  92. ;;font Courier10PC8DN.italic,width 25,on^[(11U^[(s0p12h10v1s0b3T,tct PC-850
  93. ;;font LinePrinterPC8DN,width 18, on^[(11U^[(s0p16.67h8.5v0s0b0T,tct PC-850
  94.  
  95. ;;PC-850 Symbol Set
  96. ;;font Courier12PC850,width 30,on^[(12U^[(s0p10h12v0s0b3T,tct PC-850
  97. ;;font Courier12PC850.bold,width 30,on^[(12U^[(s0p10h12v0s3b3T,tct PC-850
  98. ;;font Courier12PC850.italic,width 30,on^[(12U^[(s0p10h12v1s0b3T,tct PC-850
  99. ;;font Courier10PC850,width 25,on^[(12U^[(s0p12h10v0s0b3T,tct PC-850
  100. ;;font Courier10PC850.bold,width 25,on^[(12U^[(s0p12h10v0s3b3T,tct PC-850
  101. ;;font Courier10PC850.italic,width 25,on^[(12U^[(s0p12h10v1s0b3T,tct PC-850
  102. ;;font LinePrinterPC850,width 18, on^[(12U^[(s0p16.67h8.5v0s0b0T,tct PC-850
  103.  
  104. ;;Legal Symbol Set  has (R) (C) sect dagger TM (no tct needed)
  105. font CourierLGL,width 30,on^[(1U^[(s0p10h12v0s0b3T
  106. font CourierLGL.bold,width 30,on^[(1U^[(s0p10h12v0s3b3T
  107. font CourierLGL.italic,width 30,on^[(1U^[(s0p10h12v1s0b3T
  108. font Courier10LGL,width 25,on^[(1U^[(s0p12h10v0s0b3T
  109. font Courier10LGL.bold,width 25,on^[(1U^[(s0p12h10v0s3b3T
  110. font Courier10LGL.italic,width 25,on^[(1U^[(s0p12h10v1s0b3T
  111. font LinePrinterLGL,width 18, on^[(1U^[(s0p16.67h8.5v0s0b0T
  112. font TimesLGL, on^[(1U^[(s1p%72*300/uv0s0b4101T,pst CGTimes
  113. font TimesLGL.bold, on^[(1U^[(s1p%72*300/uv0s3b4101T,pst CGTimes
  114. font TimesLGL.italic, on^[(1U^[(s1p%72*300/uv1s0b4101T,pst CGTimes
  115. font TimesLGL.bold.italic, on^[(1U^[(s1p%72*300/uv1s3b4101T,pst CGTimes
  116. font HelveticaLGL, on^[(1U^[(s1p%72*300/uv0s0b4148T,pst Univers
  117. font HelveticaLGL.bold, on^[(1U^[(s1p%72*300/uv0s3b4148T,pst Univers
  118. font HelveticaLGL.italic, on^[(1U^[(s1p%72*300/uv1s0b4148T,pst Univers
  119. font HelveticaLGL.bold.italic, on^[(1U^[(s1p%72*300/uv1s3b4148T,pst Univers
  120.  
  121. printer LaserJet III.None-Landscape, page ^M,
  122.     hpi 300, vpi 232,
  123.     ff^L,cr^M,leftm 2,flag2, ;; from portrait
  124.     fwd %1g^[*p%uX,mhm 255,shadow 2, ;; fp
  125.     size 50, ;; fp
  126.     down ^[*p+%uY,mvm 255, ;; fp
  127.     init^[&l1oe50F^[&aR^[9,reset^[E^[&lo66F
  128.  
  129. ;;Roman8 Symbol set (tct Roman8 is later in file)
  130. font Courier,width 30,on^[(10U^[(s0p10h12v0s0b3T,tct Roman8
  131. font Courier.bold,width 30,on^[(10U^[(s0p10h12v0s3b3T,tct Roman8
  132. font LinePrinter,width 18, on^[(10U^[(s0p16.67h8.5v0s0b0T,tct Roman8
  133.  
  134. ;;ECMA-94 Latin 1 Symbol Set
  135. ;;font Courier12Ltn1,width 30,on^[(0N^[(s0p10h12v0s0b3T,tct ECMA
  136. ;;font Courier12Ltn1.bold,width 30,on^[(0N^[(s0p10h12v0s3b3T,tct ECMA
  137. ;;font LinePrinterLtn1,width 18, on^[(0N^[(s0p16.67h8.5v0s0b0T,tct ECMA
  138.  
  139. ;;PC-8 Symbol Set (no tct needed)
  140. font CourierPC,width 30,on^[(10U^[(s0p10h12v0s0b3T
  141. font CourierPC.bold,width 30,on^[(10U^[(s0p10h12v0s3b3T
  142. font LinePrinterPC,width 18, on^[(10U^[(s0p16.67h8.5v0s0b0T
  143.  
  144. ;;PC-8 D/N (Danish/Norwegian) Symbol Set
  145. ;;font Courier12PC8DN,width 30,on^[(11U^[(s0p10h12v0s0b3T,tct PC-850
  146. ;;font Courier12PC8DN.bold,width 30,on^[(11U^[(s0p10h12v0s3b3T,tct PC-850
  147. ;;font LinePrinterPC8DN,width 18, on^[(11U^[(s0p16.67h8.5v0s0b0T,tct PC-850
  148.  
  149. ;;PC-850 Symbol Set
  150. ;;font Courier12PC850,width 30,on^[(12U^[(s0p10.00h12.0v0s0b3T,tct PC-850
  151. ;;font Courier12PC850.bold,width 30,on^[(12U^[(s0p10.00h12.0v0s3b3T,tct PC-850
  152. ;;font LinePrinterPC850,width 18, on^[(12U^[(s0p16.67h8.5v0s0b0T,tct PC-850
  153.  
  154. ;;Legal Symbol Set
  155. font CourierLGL,width 30,on^[(1U^[(s0p10h12v0s0b3T
  156. font CourierLGL.bold,width 30,on^[(1U^[(s0p10h12v0s3b3T
  157. font LinePrinterLGL,width 18, on^[(1U^[(s0p16.67h8.5v0s0b0T
  158.  
  159.  
  160. pst CGTimes,
  161. SP 15,   ! 17,   " 23,   # 25,   $ 25,   % 44,  
  162. & 39,   ' 17,   ( 17,   ) 17,   * 25,   + 44,   
  163. , 17,   - 17,   . 17,   / 17,   0 25,   1 25,   
  164. 2 25,   3 25,   4 25,   5 25,   6 25,   7 25,   
  165. 8 25,   9 25,   : 17,   ; 17,   < 50,   = 44,   
  166. > 50,   ? 22,   @ 44,   A 36,   B 31,   C 34,   
  167. D 37,   E 31,   F 30,   G 36,   H 37,   I 17,   
  168. J 19,   K 35,   L 31,   M 45,   N 37,   O 36,   
  169. P 29,   Q 36,   R 33,   S 27,   T 31,   U 37,   
  170. V 36,   W 47,   X 36,   Y 36,   Z 32,   [ 17,   
  171. \\ 17,   ] 17,   \^ 25,   _ 25,   ` 17,   a 22, 
  172. b 25,   c 22,   d 25,   e 22,   f 17,   g 25,   
  173. h 25,   i 14,   j 14,   k 25,   l 14,   m 39,   
  174. n 25,   o 25,   p 25,   q 25,   r 18,   s 19,   
  175. t 14,   u 25,   v 25,   w 36,   x 25,   y 25,   
  176. z 22,   { 22,   | 25,   } 22,   \~ 50
  177.  
  178. pst Univers,
  179. SP 17,   ! 17,   " 25,   # 31,   $ 31,   % 50,   
  180. & 38,   ' 17,   ( 17,   ) 17,   * 31,   + 50,   
  181. , 17,   - 17,   . 17,   / 17,   0 31,   1 31,   
  182. 2 31,   3 31,   4 31,   5 31,   6 31,   7 31,   
  183. 8 31,   9 31,   : 17,   ; 17,   < 50,   = 50,   
  184. > 50,   ? 26,   @ 50,   A 37,   B 31,   C 35,   
  185. D 36,   E 29,   F 28,   G 37,   H 36,   I 14,   
  186. J 28,   K 33,   L 27,   M 45,   N 36,   O 38,   
  187. P 30,   Q 39,   R 32,   S 32,   T 31,   U 36,   
  188. V 36,   W 50,   X 36,   Y 34,   Z 30,   [ 17,   
  189. \\ 17,   ] 17,   \^ 25,   _ 25,   ` 17,   a 27,   
  190. b 29,   c 27,   d 29,   e 27,   f 18,   g 29,   
  191. h 29,   i 12,   j 12,   k 27,   l 12,   m 43,   
  192. n 29,   o 29,   p 29,   q 29,   r 18,   s 25,   
  193. t 18,   u 29,   v 28,   w 43,   x 28,   y 28,   
  194. z 24,   { 22,   | 25,   } 22,   \~ 50
  195.  
  196. tct roman8,
  197. ~^@ 180,    ~^P 220,    ~SP 196,    ~` ,        ~p ,
  198. ~^A 207,            ~! 213,    ~a 222,    ~q 254,
  199. ~^B 197,            ~" 198,    ~b ,        ~r ,
  200. ~^C 192,    ~^S 194,    ~# 199,    ~c ,        ~s ,
  201. ~^D 204,    ~^T 206,    ~$ 183,    ~d ,        ~t ,
  202. ~^E 200,    ~^U 202,    ~% 182,    ~e ,        ~u ,
  203. ~^F 212,    ~^V 195,            ~f ,        ~v ,
  204. ~^G 181,    ~^W 203,            ~g ,
  205. ~^H 193,    ~^X 239,    ~( 185,    ~h ,        ~x 179,
  206. ~^I 205,    ~^Y 218,    ~) ,        ~i ,        ~y ,
  207. ~^J 201,    ~^Z 219,    ~* ,        ~j ,        ~z ,
  208. ~^K 221,    ~^[ 191,    ~+ 248,    ~k ,
  209. ~^L 209,    ~^\ 187,    ~, 247,    ~l ,        ~| ,
  210. ~^M 217,    ~^] 188,    ~- 184,
  211. ~^N 216,            ~. 251,    ~n ,
  212. ~^O 208,    ~^_ 190,    ~/ 253,    
  213. ~0 176,        ~P 208,
  214. ~1 177,        ~Q 209,
  215. ~2 178,        ~R 210,
  216. ~3 179,    ~C 195,    ~S 211,
  217.         ~T 212,
  218.     ~E 197,    ~U 213,
  219.     ~F 198,    ~V 214,
  220.     ~G 199, ~W 215,
  221.     ~H 200,    ~X 216,
  222.     ~I 201,    ~Y 217,
  223. ~: 186,    ~J 202,    ~Z 218,
  224. ~; 187,    ~K 203,    ~[ 219,
  225.     ~L 204,    ~\\ ,
  226. ~= 189,    ~M 205,    ~] ,
  227.     ~N 206,    ~\^ ,
  228.     ~O 207,    ~_ ,
  229. ~^Q 215,
  230. ~^R 211,
  231. ~^^ 175,
  232. ~& 249,
  233. ~' 250,
  234. ~4 161,
  235. ~5 162,
  236. ~6 225,
  237. ~7 163,
  238. ~8 164,
  239. ~9 165,
  240. ~< 166,
  241. ~> 167,
  242. ~? 230,
  243. ~@ 174,
  244. ~A 173,
  245. ~B 237,
  246. ~D 246,
  247. ~m 214,
  248. ~o 241,
  249. ~w 172,
  250. ~{ 168,
  251. ~} 171,
  252. ~~ 252
  253.  
  254. ; Annotations on above changes to tct roman8:
  255. ;
  256. ; ^U 189,  ; 21 section; was blank
  257. ; ~^Q 215,  ; 145 lowercase ae; was 211 (uppercase)
  258. ; ~^R 211,  ; 146 uppercase AE; was blank
  259. ; ~^^ 175,  ; 158 Italian lira, was blank
  260. ; ~& 249,  ; 166 feminine ordinal; was blank
  261. ; ~' 250,  ; 167 masculine ordinal; was blank
  262. ; ~4 161,  ; 180 linedraw as A grave (`); was * (42)
  263. ; ~5 162,  ; 181 linedraw as A circumflex; was blank
  264. ; ~6 225,  ; 182 linedraw as A tilde; was *
  265. ; ~7 163,  ; 183 linedraw as E grave; was *
  266. ; ~8 164,  ; 184 linedraw as E circumflex; was *
  267. ; ~9 165,  ; 185 linedraw as E umlaut; was *
  268. ; ~< 166,  ; 188 linedraw as I circumflex; was *
  269. ; ~> 167,  ; 190 linedraw as I umlaut; was *
  270. ; ~? 230,  ; 191 linedraw as I grave; was *
  271. ; ~@ 174,  ; 192 linedraw as U circumflex; was *
  272. ; ~A 173,  ; 193 linedraw as U grave; was *
  273. ; ~B 237,  ; 194 linedraw as U acute ('); was *
  274. ; ~D 246,  ; 196 long dash; was *
  275. ; ~m 214,  ; lowercase o crossbar; was 210 (uppercase)
  276. ; ~o 241,  ; 239 intersect as lowercase thorn; was blank
  277. ; ~w 172,  ; 247 ~~ as tilde accent; was blank
  278. ; ~{ 168,  ; 251 surd as acute accent; was blank
  279. ; ~} 171,  ; 253 squared as umlaut; was blank
  280. ; ~~ 252   ; 254 square bullet as solid; was blank
  281.  
  282. tct ECMA,
  283. ~^@ 199,    ~^P 201,    ~SP 225,    ~` ,        ~p ,
  284. ~^A 252,    ~^Q 198,    ~! 237,    ~a 223,    ~q 177,
  285. ~^B 233,    ~^R ,        ~" 243,    ~b ,        ~r ,
  286. ~^C 226,    ~^S 244,    ~# 250,    ~c ,        ~s ,
  287. ~^D 228,    ~^T 246,    ~$ 241,    ~d ,        ~t ,
  288. ~^E 193,    ~^U 242,    ~% 209,    ~e ,        ~u ,
  289. ~^F 229,    ~^V 251,    ~& ,        ~f ,        ~v ,
  290. ~^G 231,    ~^W 249,    ~' ,        ~g ,        ~w ,
  291. ~^H 234,    ~^X 255,    ~( 191,    ~h ,        ~x 176,
  292. ~^I 235,    ~^Y 214,    ~) ,        ~i ,        ~y ,
  293. ~^J 232,    ~^Z 220,    ~* ,        ~j ,        ~z ,
  294. ~^K 239,    ~^[ 162,    ~+ 189,    ~k ,        ~{ ,
  295. ~^L 238,    ~^\ 163,    ~, 188,    ~l ,        ~| ,
  296. ~^M 236,    ~^] 165,    ~- 161,    ~m 216,    ~} ,
  297. ~^N 196,    ~^^ ,        ~. 171,    ~n ,        ~~ ,
  298. ~^O 197,    ~^_ ,    ~/ 253,    ~o 
  299.  
  300. tct PC-850,
  301. ~^@ 128,    ~^P 144,    ~SP 160,    ~` ,        ~p ,
  302. ~^A 129,    ~^Q 146,    ~! 134,    ~a 225,    ~q 241,
  303. ~^B 130,    ~^R ,        ~" 162,    ~b ,        ~r ,
  304. ~^C 131,    ~^S 147,    ~# 163,    ~c ,        ~s ,
  305. ~^D 132,    ~^T 148,    ~$ 164,    ~d ,        ~t ,
  306. ~^E 133,    ~^U 149,    ~% 165,    ~e ,        ~u ,
  307. ~^F 134,    ~^V 150,    ~& ,        ~f ,        ~v ,
  308. ~^G 135,    ~^W 151,    ~' ,        ~g ,        ~w ,
  309. ~^H 136,    ~^X 152,    ~( 168,    ~h ,        ~x 248,
  310. ~^I 137,    ~^Y 153,    ~) ,        ~i ,        ~y ,
  311. ~^J 138,    ~^Z 154,    ~* ,        ~j ,        ~z ,
  312. ~^K 139,    ~^[ 189,    ~+ 171,    ~k ,        ~{ ,
  313. ~^L 140,    ~^\ 156,    ~, 172,    ~l ,        ~| ,
  314. ~^M 141,    ~^] 190,    ~- 173,    ~m 157,    ~} ,
  315. ~^N 142,    ~^^ ,        ~. 174,    ~n ,        ~~ ,
  316. ~^O 143,    ~^_ 159,    ~/ 175,    ~o 
  317.